home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 26
/
Cream of the Crop 26.iso
/
games
/
zmud455.zip
/
ZMUD.EXE
/
0
/
RCDATA
/
TCHARDIALOG
/
TCHARDIALOG.txt
Wrap
Text File
|
1997-04-13
|
33KB
|
1,101 lines
object CharDialog: TCharDialog
Left = 326
Top = 124
HelpContext = 160
BorderStyle = bsDialog
Caption = 'Character Database'
ClientHeight = 329
ClientWidth = 630
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Position = poScreenCenter
ShowHint = True
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label12: TLabel
Left = 8
Top = 8
Width = 107
Height = 13
Caption = 'Stored Characters:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 8
Top = 24
Width = 166
Height = 13
Caption = 'Click on a character below to edit it'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 8
Top = 38
Width = 133
Height = 13
Caption = 'Double-click to connect to it'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label30: TLabel
Left = 8
Top = 58
Width = 20
Height = 13
Caption = 'Red'
Font.Color = clRed
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label31: TLabel
Left = 34
Top = 58
Width = 120
Height = 13
Caption = 'characters are getting old'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object CharTab: TTabbedNotebook
Left = 232
Top = 0
Width = 396
Height = 297
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
TabsPerRow = 4
TabFont.Color = clBtnText
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 0
OnChange = CharTabChange
object TTabPage
Left = 4
Top = 24
Caption = 'Connection'
object Label2: TLabel
Left = 147
Top = 98
Width = 23
Height = 13
Alignment = taRightJustify
Caption = 'Title:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 9
Top = 194
Width = 49
Height = 13
Alignment = taRightJustify
Caption = 'Character:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 233
Top = 194
Width = 49
Height = 13
Alignment = taRightJustify
Caption = 'Password:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 33
Top = 122
Width = 25
Height = 13
Alignment = taRightJustify
Caption = 'Host:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 268
Top = 122
Width = 22
Height = 13
Alignment = taRightJustify
Caption = 'Port:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 33
Top = 146
Width = 25
Height = 13
Alignment = taRightJustify
Caption = 'Addr:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 6
Top = 218
Width = 52
Height = 13
Alignment = taRightJustify
Caption = 'Comments:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Image2: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object LookupBtn: TSpeedButton
Tag = 1
Left = 205
Top = 146
Width = 20
Height = 20
Hint = 'Compute IP Address|'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF7333337000000000733333377777777733330000}
NumGlyphs = 2
OnClick = LookupBtnClick
end
object WizBtn: TSpeedButton
Tag = 1
Left = 22
Top = 64
Width = 20
Height = 20
Hint = 'MUD Wizard|'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
3333333373FF7333333333333000333333333333377733333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = WizBtnClick
end
object Label16: TLabel
Left = 48
Top = 68
Width = 234
Height = 13
Caption = 'or Click the book button to open the MUD Wizard'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 64
Top = 22
Width = 296
Height = 13
Caption = 'enter the Title of the MUD and the Host and Port to connect to'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 48
Top = 38
Width = 266
Height = 13
Caption = 'The character name and password will be auto-detected'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 64
Top = 52
Width = 97
Height = 13
Caption = 'when you first log on'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Bevel1: TBevel
Left = 8
Top = 176
Width = 369
Height = 9
Shape = bsTopLine
end
object Label20: TLabel
Left = 48
Top = 8
Width = 192
Height = 13
Caption = 'Enter a unique ID for this character, then'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label26: TLabel
Left = 44
Top = 98
Width = 14
Height = 13
Alignment = taRightJustify
Caption = 'ID:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object UseBtn: TSpeedButton
Tag = 1
Left = 228
Top = 146
Width = 29
Height = 20
Hint = 'Use IP Address|'
AllowAllUp = True
GroupIndex = 1
Caption = 'Use'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
NumGlyphs = 2
ParentFont = False
end
object Title: TEdit
Left = 176
Top = 96
Width = 201
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object MUDType: TComboBox
Left = 272
Top = 144
Width = 105
Height = 21
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'Diku'
'Circle'
'MERC'
'LPMUD'
'MOO'
'MUCK'
'MUSH'
'MUD'
'DGD')
ParentFont = False
TabOrder = 4
end
object CharName: TEdit
Left = 64
Top = 192
Width = 161
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
end
object Password: TEdit
Left = 288
Top = 192
Width = 89
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PasswordChar = '*'
TabOrder = 6
end
object Host: TEdit
Left = 64
Top = 120
Width = 193
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object Port: TEdit
Left = 296
Top = 120
Width = 81
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object Addr: TEdit
Left = 64
Top = 144
Width = 137
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object Comments: TEdit
Left = 64
Top = 216
Width = 313
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
end
object Panel1: TPanel
Left = 0
Top = 251
Width = 388
Height = 18
Align = alBottom
BevelOuter = bvLowered
TabOrder = 9
object Label8: TLabel
Left = 4
Top = 3
Width = 78
Height = 13
Alignment = taRightJustify
Caption = 'Last Connected:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 252
Top = 3
Width = 53
Height = 13
Alignment = taRightJustify
Caption = 'Total Time:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LastTime: TEdit
Left = 88
Top = 3
Width = 145
Height = 14
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 0
Text = 'LastTime'
end
object TotalSec: TEdit
Left = 309
Top = 3
Width = 73
Height = 14
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 1
Text = '255 24:00:00'
end
end
object Name: TEdit
Left = 64
Top = 96
Width = 73
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
end
object TTabPage
Left = 4
Top = 24
Caption = 'Settings'
object Label1: TLabel
Left = 28
Top = 114
Width = 78
Height = 13
Alignment = taRightJustify
Caption = 'Primary Settings:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 308
Top = 112
Width = 20
Height = 20
Glyph.Data = {
90010000424D9001000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555500000000000555550000000000
05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7
B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7
B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7
B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB
0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000
5555550000055555555555000005555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
OnClick = FileNameClick
end
object Label10: TLabel
Left = 21
Top = 138
Width = 85
Height = 13
Alignment = taRightJustify
Caption = 'Inherited Settings:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton2: TSpeedButton
Tag = 1
Left = 308
Top = 136
Width = 20
Height = 20
Glyph.Data = {
90010000424D9001000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555500000000000555550000000000
05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7
B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7
B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7
B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB
0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000
5555550000055555555555000005555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
OnClick = FileNameClick
end
object Image3: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label21: TLabel
Left = 48
Top = 44
Width = 273
Height = 13
Caption = 'The Inherited Settings file is loaded before your primary file'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label22: TLabel
Left = 48
Top = 14
Width = 280
Height = 13
Caption = 'The Settings File contains the preferences, triggers, aliases,'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 64
Top = 28
Width = 141
Height = 13
Caption = 'macros, etc for your character'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 64
Top = 58
Width = 237
Height = 13
Caption = 'and typically contains defaults for the type of MUD'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label25: TLabel
Left = 48
Top = 80
Width = 276
Height = 13
Caption = 'Enter a MUD file name, or click the folder button to browse'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 48
Top = 172
Width = 221
Height = 13
Caption = 'Enter the number of days till the entry turns red '
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label28: TLabel
Left = 67
Top = 185
Width = 235
Height = 13
Caption = 'indicating the character hasn'#39't been used recently'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label29: TLabel
Left = 27
Top = 211
Width = 79
Height = 13
Alignment = taRightJustify
Caption = 'Days till warning:'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object FileName: TEdit
Left = 112
Top = 112
Width = 193
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object Parent: TEdit
Left = 112
Top = 136
Width = 193
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object WarnDays: TEdit
Left = 112
Top = 209
Width = 58
Height = 21
AutoSize = False
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
end
object TTabPage
Left = 4
Top = 24
Caption = 'Notes'
object Image1: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label15: TLabel
Left = 48
Top = 16
Width = 240
Height = 13
Caption = 'Enter any comments for this character on this MUD'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Notes: TMemo
Left = 8
Top = 48
Width = 369
Height = 209
ScrollBars = ssBoth
TabOrder = 0
end
end
end
object NewBtn: TBitBtn
Left = 8
Top = 300
Width = 77
Height = 27
Caption = '&New'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = NewBtnClick
Margin = 2
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object DelBtn: TBitBtn
Left = 167
Top = 300
Width = 27
Height = 27
Hint = 'Delete character|'
TabOrder = 6
OnClick = DelBtnClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
3333333337FFF7F33333333330000033333333333777773333330000}
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object HelpBtn: TBitBtn
Left = 552
Top = 300
Width = 77
Height = 27
HelpContext = 160
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
Kind = bkHelp
Spacing = -1
IsControl = True
end
object CopyBtn: TBitBtn
Left = 88
Top = 300
Width = 77
Height = 27
Caption = 'Copy'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = CopyBtnClick
Glyph.Data = {
56070000424D5607000000000000360400002800000028000000140000000100
0800000000002003000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
03030303030303030303030303030303030303030303FFFFFFFFFFFFFFFFFFFF
0303030303030303030000000000000000000003030303030303030303F8F8F8
F8F8F8F8F8F8F8FF03030303030303030300FFFFFFFFFFFFFFFF000303030303
0303030303F8FF03030303030303F8FF03030303030303030300FBFFFBFFFBFF
FBFF0003030303030303030303F8FF03FFFFFFFFFFFFF8FF0303030303030303
0300FFF8F8F8F8F8F8FF0003030303030303030303F8FFF8F8F8F8F8F803F8FF
03030303030303030300FBFFFBFFFBFFFBFF00030303030303FFFFFFFFF8FF03
FFFFFFFFFFFFF8FF03030303000000000000FFF8F8F8F8F8F8FF000303030303
F8F8F8F8F8F8FFF8F8F8F8F8F803F8FF0303030300FFFFFFFF00FBFFFBFFFBFF
FBFF000303030303F8FF030303F8FF03FFFFFFFFFFFFF8FF0303030300FFFFFF
FF00FFF8F8F8F8F8F8FF000303030303F8FF030303F8FFF8F8F8F8F8F803F8FF
0303030300FF07070700FBFFFBFFFBFFFBFF000303030303F8FF030303F8FF03
0303030303FFF8FF0303030300FFFFFFFF00FFFFFFFFFFFF0000000303030303
F8FF030303F8FF0303030303F8F8F8030303030300FF07070700FBFFFBFFFBFF
0000030303030303F8FF030303F8FFFFFFFFFFFFF8F803030303030300FFFFFF
FF000000000000000003030303030303F8FF030303F8F8F8F8F8F8F8F8030303
0303030300FF070707070707FF0003030303030303030303F8FF030303030303
03F8FF03030303030303030300FFFFFFFFFFFFFFFF0003030303030303030303
F8FF030303030303FFF8FF03030303030303030300FFFFFFFFFFFF0000000303
0303030303030303F8FF0303030303F8F8F80303030303030303030300FFFFFF
FFFFFF00000303030303030303030303F8FFFFFFFFFFFFF8F803030303030303
030303030000000000000000030303030303030303030303F8F8F8F8F8F8F8F8
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303}
NumGlyphs = 2
end
object LoadBut: TBitBtn
Left = 232
Top = 300
Width = 77
Height = 27
Caption = 'Connect'
Default = True
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 1
ParentFont = False
TabOrder = 1
OnClick = LoadButClick
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 312
Top = 300
Width = 77
Height = 27
Caption = '&Offline'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 4
ParentFont = False
TabOrder = 2
OnClick = LoadButClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333333333C3333333333333337F3333333333333C0C3333
333333333777F33333333333C0F0C3333333333377377F333333333C0FFF0C33
3333333777F377F3333333CCC0FFF0C333333373377F377F33333CCCCC0FFF0C
333337333377F377F3334CCCCCC0FFF0C3337F3333377F377F33C4CCCCCC0FFF
0C3377F333F377F377F33C4CC0CCC0FFF0C3377F3733F77F377333C4CCC0CC0F
0C333377F337F3777733333C4C00CCC0333333377F773337F3333333C4CCCCCC
3333333377F333F7333333333C4CCCC333333333377F37733333333333C4C333
33333333337773333333333333333333333333333333333333330000}
NumGlyphs = 2
end
object CharListBox: TListBox
Left = 0
Top = 160
Width = 233
Height = 97
ItemHeight = 13
Sorted = True
TabOrder = 8
Visible = False
end
object CloseBtn: TBitBtn
Left = 392
Top = 300
Width = 77
Height = 27
Caption = '&Empty'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 7
ParentFont = False
TabOrder = 3
OnClick = CloseBtnClick
Glyph.Data = {
90010000424D9001000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333300000000000
000033333333333333333077777777777770333333333333333330FFFFFFFFFF
FF70333333333333333330FFFFFFFFFFFF80333333333333333330FFFFFFFFFF
FF80333333333333333330FFFFFFFFFFFF80333333333333333330FFFFFFFFFF
FF80333333333333333330FFFFFFFFFFFF80333333333333333330FFFFFFFFFF
FF80333333333333333330FFFFFFFFFFFF80333333333333333330FFFFFFFFFF
FF70333333333333333330444444444444403333333333333333300000000000
0000333333333333333333333333333333333333333333333333000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
end
object CharGrid: TDrawGrid
Left = 7
Top = 85
Width = 221
Height = 208
ColCount = 3
DefaultRowHeight = 17
FixedCols = 0
RowCount = 20
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect, goThumbTracking]
ParentFont = False
ScrollBars = ssVertical
TabOrder = 9
OnClick = CharGridClick
OnDblClick = CharGridDblClick
OnDrawCell = CharGridDrawCell
OnMouseDown = CharGridMouseDown
ColWidths = (
50
54
213)
end
object CancelBtn: TBitBtn
Left = 472
Top = 300
Width = 77
Height = 27
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 10
OnClick = CloseBtnClick
Kind = bkCancel
end
object OpenFileDialog: TOpenDialog
DefaultExt = 'mud'
FileEditStyle = fsEdit
Filter = 'MUD Files|*.mud|All files|*.*'
Left = 184
Top = 8
end
object CharPop: TPopupMenu
Left = 184
Top = 40
object Connect1: TMenuItem
Caption = 'Connect'
ShortCut = 0
OnClick = Connect1Click
end
object Offline1: TMenuItem
Caption = 'Offline'
ShortCut = 0
OnClick = Offline1Click
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object New1: TMenuItem
Caption = 'New'
ShortCut = 0
OnClick = NewBtnClick
end
object Delete1: TMenuItem
Caption = 'Delete'
ShortCut = 0
OnClick = DelBtnClick
end
object Copy1: TMenuItem
Caption = 'Copy'
ShortCut = 0
OnClick = CopyBtnClick
end
end
end